home *** CD-ROM | disk | FTP | other *** search
/ MacWorld 1999 January - Disc 2 / Macworld (1999-01) (Disk 2).dmg / Serious Demos / Symbolic Composer 4.2 / Environment / System / MRAC / Toolbox / Misc / get-ratio-cl < prev    next >
Encoding:
Text File  |  1998-08-11  |  257 b   |  13 lines  |  [TEXT/ScoM]
  1. get-ratio-cl list
  2.  
  3. Use this function when working with note-lengths or zone-lengths to get Common Lisp ratios from Symbolic Composer ratios.
  4.  
  5. (get-ratio-cl '1/1)
  6. => 1
  7.  
  8. (get-ratio-cl '(1/1 1/1))
  9. => (1 1)
  10.  
  11. (get-ratio-cl '((1/1) (1/2 1/2)))
  12. => ((1) (1/2 1/2))
  13.